home *** CD-ROM | disk | FTP | other *** search
/ PC Plus SuperCD (UK) 1997 May / PC Plus Super CD Issue 127 (May 1997).iso / delphi2 / delphite.exe / data.z / MDREP.DFM / MDREP.txt < prev   
Encoding:
Text File  |  1996-08-12  |  13.8 KB  |  638 lines
  1. object MDForm: TMDForm
  2.   Left = 388
  3.   Top = 130
  4.   Width = 789
  5.   Height = 459
  6.   HorzScrollBar.Range = 1200
  7.   VertScrollBar.Range = 2000
  8.   AutoScroll = False
  9.   Caption = 'Master Detail demo Report'
  10.   Font.Color = clBlack
  11.   Font.Height = -13
  12.   Font.Name = 'Arial'
  13.   Font.Style = []
  14.   PixelsPerInch = 96
  15.   ShowHint = True
  16.   TextHeight = 16
  17.   object Orderlines: TQRBand
  18.     Left = 0
  19.     Top = 117
  20.     Width = 1200
  21.     Height = 19
  22.     Align = alTop
  23.     BandType = rbSubDetail
  24.     Color = clWhite
  25.     ForceNewPage = False
  26.     Frame.Width = 0
  27.     LinkBand = OrderSummary
  28.     Ruler = qrrNone
  29.     object QRDBText8: TQRDBText
  30.       Left = 112
  31.       Top = 0
  32.       width = 229
  33.       height = 17
  34.       DataSource = CustomerData.LineItemSource
  35.       DataField = 'PartName'
  36.     end
  37.     object QRDBText12: TQRDBText
  38.       Left = 32
  39.       Top = 0
  40.       width = 69
  41.       height = 17
  42.       DataSource = CustomerData.LineItemSource
  43.       DataField = 'PartNo'
  44.     end
  45.     object QRDBText13: TQRDBText
  46.       Left = 348
  47.       Top = 0
  48.       width = 89
  49.       height = 17
  50.       Alignment = taRightJustify
  51.       DataSource = CustomerData.LineItemSource
  52.       DataField = 'Price'
  53.     end
  54.     object QRDBText14: TQRDBText
  55.       Left = 444
  56.       Top = 0
  57.       width = 33
  58.       height = 17
  59.       Alignment = taRightJustify
  60.       DataSource = CustomerData.LineItemSource
  61.       DataField = 'Qty'
  62.     end
  63.     object QRDBText16: TQRDBText
  64.       Left = 492
  65.       Top = 0
  66.       width = 81
  67.       height = 17
  68.       Alignment = taRightJustify
  69.       DataSource = CustomerData.LineItemSource
  70.       DataField = 'Total'
  71.     end
  72.   end
  73.   object Title: TQRBand
  74.     Left = 0
  75.     Top = 0
  76.     Width = 1200
  77.     Height = 45
  78.     Align = alTop
  79.     BandType = rbTitle
  80.     Color = clWhite
  81.     Font.Color = clNavy
  82.     Font.Height = -13
  83.     Font.Name = 'Arial'
  84.     Font.Style = []
  85.     ForceNewPage = False
  86.     Frame.Width = 0
  87.     ParentFont = False
  88.     Ruler = qrrInchesHV
  89.     object QRLabel15: TQRLabel
  90.       Left = 84
  91.       Top = 4
  92.       width = 193
  93.       height = 36
  94.       Caption = 'QuickReport'
  95.       AlignToBand = False
  96.       Font.Color = 8404992
  97.       Font.Height = -32
  98.       Font.Name = 'Arial'
  99.       Font.Style = [fsBold, fsItalic]
  100.       ParentFont = False
  101.     end
  102.     object Image1: TImage
  103.       Left = 8
  104.       Top = 4
  105.       Width = 69
  106.       Height = 33
  107.       Picture.Data = {<image000.bmp>}
  108.       Stretch = True
  109.     end
  110.     object QRLabel1: TQRLabel
  111.       Left = 288
  112.       Top = 20
  113.       width = 83
  114.       height = 16
  115.       Caption = 'for Delphi 2.0'
  116.       AlignToBand = False
  117.       Font.Color = 8404992
  118.       Font.Height = -13
  119.       Font.Name = 'Arial'
  120.       Font.Style = [fsBold, fsItalic]
  121.       ParentFont = False
  122.     end
  123.     object QRLabel16: TQRLabel
  124.       Left = 560
  125.       Top = 20
  126.       width = 167
  127.       height = 16
  128.       Caption = 'Copyright (c) 1996 QSD AS'
  129.       AlignToBand = False
  130.       Font.Color = clBlack
  131.       Font.Height = -13
  132.       Font.Name = 'Arial'
  133.       Font.Style = [fsBold, fsItalic]
  134.       ParentFont = False
  135.     end
  136.   end
  137.   object CustomerHeading: TQRBand
  138.     Left = 0
  139.     Top = 45
  140.     Width = 1200
  141.     Height = 36
  142.     Align = alTop
  143.     BandType = rbDetail
  144.     Color = 8404992
  145.     ForceNewPage = False
  146.     Frame.Width = 0
  147.     LinkBand = Detail
  148.     Ruler = qrrNone
  149.     object QRDBText1: TQRDBText
  150.       Left = 8
  151.       Top = 12
  152.       width = 245
  153.       height = 17
  154.       DataSource = CustomerData.CustomerSource
  155.       DataField = 'Company'
  156.       Font.Color = clWhite
  157.       Font.Height = -16
  158.       Font.Name = 'Arial'
  159.       Font.Style = [fsBold, fsItalic]
  160.       ParentFont = False
  161.     end
  162.     object QRLabel3: TQRLabel
  163.       Left = 8
  164.       Top = 0
  165.       width = 46
  166.       height = 14
  167.       Caption = 'Customer'
  168.       AlignToBand = False
  169.       Font.Color = clWhite
  170.       Font.Height = -11
  171.       Font.Name = 'Arial'
  172.       Font.Style = []
  173.       ParentFont = False
  174.     end
  175.     object QRLabel4: TQRLabel
  176.       Left = 272
  177.       Top = 0
  178.       width = 30
  179.       height = 14
  180.       Alignment = taRightJustify
  181.       Caption = 'Phone'
  182.       AlignToBand = False
  183.       Font.Color = clWhite
  184.       Font.Height = -11
  185.       Font.Name = 'Arial'
  186.       Font.Style = []
  187.       ParentFont = False
  188.     end
  189.     object QRDBText3: TQRDBText
  190.       Left = 272
  191.       Top = 12
  192.       width = 109
  193.       height = 17
  194.       DataSource = CustomerData.CustomerSource
  195.       DataField = 'Phone'
  196.       Font.Color = clWhite
  197.       Font.Height = -16
  198.       Font.Name = 'Arial'
  199.       Font.Style = [fsBold, fsItalic]
  200.       ParentFont = False
  201.     end
  202.     object QRDBText4: TQRDBText
  203.       Left = 64
  204.       Top = 0
  205.       width = 25
  206.       height = 13
  207.       Alignment = taRightJustify
  208.       DataSource = CustomerData.CustomerSource
  209.       DataField = 'CustNo'
  210.       Font.Color = clWhite
  211.       Font.Height = -11
  212.       Font.Name = 'Arial'
  213.       Font.Style = []
  214.       ParentFont = False
  215.     end
  216.     object QRLabel5: TQRLabel
  217.       Left = 388
  218.       Top = 0
  219.       width = 18
  220.       height = 14
  221.       Caption = 'Fax'
  222.       AlignToBand = False
  223.       Font.Color = clWhite
  224.       Font.Height = -11
  225.       Font.Name = 'Arial'
  226.       Font.Style = []
  227.       ParentFont = False
  228.     end
  229.     object QRDBText5: TQRDBText
  230.       Left = 388
  231.       Top = 12
  232.       width = 105
  233.       height = 17
  234.       DataSource = CustomerData.CustomerSource
  235.       DataField = 'Fax'
  236.       Font.Color = clWhite
  237.       Font.Height = -16
  238.       Font.Name = 'Arial'
  239.       Font.Style = [fsBold, fsItalic]
  240.       ParentFont = False
  241.     end
  242.   end
  243.   object CustomerFooter: TQRBand
  244.     Left = 0
  245.     Top = 173
  246.     Width = 1200
  247.     Height = 32
  248.     Align = alTop
  249.     BandType = rbGroupFooter
  250.     Color = clWhite
  251.     ForceNewPage = False
  252.     Frame.Width = 0
  253.     Ruler = qrrNone
  254.     object QRDBCalc1: TQRDBCalc
  255.       Left = 484
  256.       Top = 0
  257.       width = 89
  258.       height = 17
  259.       Alignment = taRightJustify
  260.       DataSource = CustomerData.OrderSource
  261.       DataField = 'AmountPaid'
  262.       Font.Color = clBlack
  263.       Font.Height = -13
  264.       Font.Name = 'Arial'
  265.       Font.Style = [fsBold]
  266.       ParentFont = False
  267.       Operation = qrcSUM
  268.       PrintMask = '#,##0.00'
  269.       ResetBand = CustomerFooter
  270.     end
  271.     object QRLabel7: TQRLabel
  272.       Left = 304
  273.       Top = 0
  274.       width = 164
  275.       height = 16
  276.       Caption = 'Total sales this customer: '
  277.       AlignToBand = False
  278.       Font.Color = clBlack
  279.       Font.Height = -13
  280.       Font.Name = 'Arial'
  281.       Font.Style = [fsBold]
  282.       ParentFont = False
  283.     end
  284.   end
  285.   object PageFooter: TQRBand
  286.     Left = 0
  287.     Top = 301
  288.     Width = 1200
  289.     Height = 19
  290.     Align = alTop
  291.     BandType = rbPageFooter
  292.     Color = clWhite
  293.     ForceNewPage = False
  294.     Frame.Width = 0
  295.     Ruler = qrrNone
  296.     object QRSysData1: TQRSysData
  297.       Left = 664
  298.       Top = 0
  299.       width = 79
  300.       height = 16
  301.       Alignment = taRightJustify
  302.       AlignToBand = True
  303.       AutoSize = False
  304.       Data = qrsPageNumber
  305.       Text = 'Page '
  306.     end
  307.   end
  308.   object Summary: TQRBand
  309.     Left = 0
  310.     Top = 205
  311.     Width = 1200
  312.     Height = 96
  313.     Hint = 'QuickReport'
  314.     Align = alTop
  315.     BandType = rbSummary
  316.     Color = clWhite
  317.     ForceNewPage = False
  318.     Frame.Width = 0
  319.     Ruler = qrrNone
  320.     object QRDBCalc2: TQRDBCalc
  321.       Left = 468
  322.       Top = 8
  323.       width = 105
  324.       height = 17
  325.       Alignment = taRightJustify
  326.       DataSource = CustomerData.OrderSource
  327.       DataField = 'AmountPaid'
  328.       Operation = qrcSUM
  329.       PrintMask = ',0.00'
  330.     end
  331.     object QRLabel6: TQRLabel
  332.       Left = 300
  333.       Top = 8
  334.       width = 153
  335.       height = 16
  336.       Caption = 'Total sales all customers :'
  337.       AlignToBand = False
  338.     end
  339.     object QRLabel9: TQRLabel
  340.       Left = 48
  341.       Top = 28
  342.       width = 133
  343.       height = 16
  344.       Caption = 'Total number of orders:'
  345.       AlignToBand = False
  346.     end
  347.     object QRLabel10: TQRLabel
  348.       Left = 24
  349.       Top = 8
  350.       width = 158
  351.       height = 16
  352.       Caption = 'Total number of customers:'
  353.       AlignToBand = False
  354.     end
  355.     object QRDBCalc4: TQRDBCalc
  356.       Left = 188
  357.       Top = 8
  358.       width = 65
  359.       height = 17
  360.       Alignment = taRightJustify
  361.       DataSource = CustomerData.CustomerSource
  362.       DataField = 'Zip'
  363.       Operation = qrcCOUNT
  364.     end
  365.     object QRDBCalc5: TQRDBCalc
  366.       Left = 188
  367.       Top = 28
  368.       width = 65
  369.       height = 17
  370.       Alignment = taRightJustify
  371.       DataSource = CustomerData.OrderSource
  372.       DataField = 'AmountPaid'
  373.       Operation = qrcCOUNT
  374.     end
  375.     object QRLabel11: TQRLabel
  376.       Left = 24
  377.       Top = 48
  378.       width = 157
  379.       height = 16
  380.       Caption = 'Total number of order lines:'
  381.       AlignToBand = False
  382.     end
  383.     object QRDBCalc6: TQRDBCalc
  384.       Left = 188
  385.       Top = 48
  386.       width = 65
  387.       height = 17
  388.       Alignment = taRightJustify
  389.       DataSource = CustomerData.LineItemSource
  390.       DataField = 'Discount'
  391.       Operation = qrcCOUNT
  392.     end
  393.     object QRLabel12: TQRLabel
  394.       Left = 24
  395.       Top = 68
  396.       width = 157
  397.       height = 16
  398.       Caption = 'Total number of items sold:'
  399.       AlignToBand = False
  400.     end
  401.     object QRDBCalc7: TQRDBCalc
  402.       Left = 188
  403.       Top = 68
  404.       width = 65
  405.       height = 17
  406.       Alignment = taRightJustify
  407.       DataSource = CustomerData.LineItemSource
  408.       DataField = 'Qty'
  409.       Operation = qrcSUM
  410.     end
  411.   end
  412.   object Detail: TQRBand
  413.     Left = 0
  414.     Top = 81
  415.     Width = 1200
  416.     Height = 36
  417.     Align = alTop
  418.     BandType = rbSubDetail
  419.     Color = clWhite
  420.     ForceNewPage = False
  421.     Frame.Width = 0
  422.     LinkBand = Orderlines
  423.     Ruler = qrrNone
  424.     object QRDBText2: TQRDBText
  425.       Left = 60
  426.       Top = 0
  427.       width = 53
  428.       height = 17
  429.       Alignment = taRightJustify
  430.       DataSource = CustomerData.OrderSource
  431.       DataField = 'OrderNo'
  432.       Font.Color = clBlack
  433.       Font.Height = -13
  434.       Font.Name = 'Arial'
  435.       Font.Style = [fsBold, fsItalic]
  436.       ParentFont = False
  437.     end
  438.     object QRDBText7: TQRDBText
  439.       Left = 172
  440.       Top = 0
  441.       width = 65
  442.       height = 17
  443.       DataSource = CustomerData.OrderSource
  444.       DataField = 'SaleDate'
  445.       Font.Color = clBlack
  446.       Font.Height = -13
  447.       Font.Name = 'Arial'
  448.       Font.Style = [fsBold, fsItalic]
  449.       ParentFont = False
  450.     end
  451.     object QRLabel2: TQRLabel
  452.       Left = 4
  453.       Top = 0
  454.       width = 56
  455.       height = 16
  456.       Caption = 'Order no'
  457.       AlignToBand = False
  458.       Font.Color = clBlack
  459.       Font.Height = -13
  460.       Font.Name = 'Arial'
  461.       Font.Style = [fsBold]
  462.       ParentFont = False
  463.     end
  464.     object QRLabel8: TQRLabel
  465.       Left = 132
  466.       Top = 0
  467.       width = 29
  468.       height = 16
  469.       Caption = 'Date'
  470.       AlignToBand = False
  471.       Font.Color = clBlack
  472.       Font.Height = -13
  473.       Font.Name = 'Arial'
  474.       Font.Style = [fsBold]
  475.       ParentFont = False
  476.     end
  477.     object QRLabel17: TQRLabel
  478.       Left = 32
  479.       Top = 16
  480.       width = 19
  481.       height = 14
  482.       Caption = 'Part'
  483.       AlignToBand = False
  484.       Font.Color = clBlack
  485.       Font.Height = -11
  486.       Font.Name = 'Arial'
  487.       Font.Style = []
  488.       ParentFont = False
  489.     end
  490.     object QRShape1: TQRShape
  491.       Left = 52
  492.       Top = 24
  493.       width = 289
  494.       Height = 4
  495.       Shape = qrsHorLine
  496.     end
  497.     object QRLabel18: TQRLabel
  498.       Left = 412
  499.       Top = 16
  500.       width = 24
  501.       height = 14
  502.       Caption = 'Price'
  503.       AlignToBand = False
  504.       Font.Color = clBlack
  505.       Font.Height = -11
  506.       Font.Name = 'Arial'
  507.       Font.Style = []
  508.       ParentFont = False
  509.     end
  510.     object QRShape2: TQRShape
  511.       Left = 356
  512.       Top = 24
  513.       width = 53
  514.       Height = 4
  515.       Shape = qrsHorLine
  516.     end
  517.     object QRLabel19: TQRLabel
  518.       Left = 460
  519.       Top = 16
  520.       width = 17
  521.       height = 14
  522.       Caption = 'Qty'
  523.       AlignToBand = False
  524.       Font.Color = clBlack
  525.       Font.Height = -11
  526.       Font.Name = 'Arial'
  527.       Font.Style = []
  528.       ParentFont = False
  529.     end
  530.     object QRShape3: TQRShape
  531.       Left = 445
  532.       Top = 24
  533.       width = 11
  534.       Height = 4
  535.       Shape = qrsHorLine
  536.     end
  537.     object QRLabel20: TQRLabel
  538.       Left = 548
  539.       Top = 16
  540.       width = 23
  541.       height = 14
  542.       Caption = 'Total'
  543.       AlignToBand = False
  544.       Font.Color = clBlack
  545.       Font.Height = -11
  546.       Font.Name = 'Arial'
  547.       Font.Style = []
  548.       ParentFont = False
  549.     end
  550.     object QRShape4: TQRShape
  551.       Left = 492
  552.       Top = 24
  553.       width = 53
  554.       Height = 4
  555.       Shape = qrsHorLine
  556.     end
  557.   end
  558.   object OrderSummary: TQRBand
  559.     Left = 0
  560.     Top = 136
  561.     Width = 1200
  562.     Height = 37
  563.     Align = alTop
  564.     BandType = rbGroupFooter
  565.     Color = clWhite
  566.     ForceNewPage = False
  567.     Frame.Width = 0
  568.     LinkBand = CustomerFooter
  569.     Ruler = qrrNone
  570.     object QRShape5: TQRShape
  571.       Left = 32
  572.       Top = 12
  573.       width = 457
  574.       Height = 4
  575.       Shape = qrsHorLine
  576.     end
  577.     object QRLabel21: TQRLabel
  578.       Left = 500
  579.       Top = 4
  580.       width = 72
  581.       height = 14
  582.       Caption = 'Total this order'
  583.       AlignToBand = False
  584.       Font.Color = clBlack
  585.       Font.Height = -11
  586.       Font.Name = 'Arial'
  587.       Font.Style = []
  588.       ParentFont = False
  589.     end
  590.     object QRDBCalc3: TQRDBCalc
  591.       Left = 496
  592.       Top = 20
  593.       width = 77
  594.       height = 17
  595.       Alignment = taRightJustify
  596.       DataSource = CustomerData.LineItemSource
  597.       DataField = 'Total'
  598.       Operation = qrcSUM
  599.       PrintMask = '#,##0.00'
  600.       ResetBand = OrderSummary
  601.     end
  602.   end
  603.   object MDRep: TQuickReport
  604.     DataSource = CustomerData.CustomerSource
  605.     ColumnMarginInches = 0
  606.     ColumnMarginMM = 0
  607.     Columns = 1
  608.     DisplayPrintDialog = False
  609.     LeftMarginInches = 0
  610.     LeftMarginMM = 0
  611.     Orientation = poPortrait
  612.     ReportTitle = 'QuickReport Master/detail demonstration'
  613.     RestartData = True
  614.     SQLCompatible = False
  615.     TitleBeforeHeader = False
  616.     Left = 4
  617.     Top = 324
  618.   end
  619.   object QRDetailLink1: TQRDetailLink
  620.     DataSource = CustomerData.OrderSource
  621.     DetailBand = Detail
  622.     FooterBand = CustomerFooter
  623.     Master = MDRep
  624.     PrintBefore = False
  625.     Left = 12
  626.     Top = 352
  627.   end
  628.   object QRDetailLink2: TQRDetailLink
  629.     DataSource = CustomerData.LineItemSource
  630.     DetailBand = Orderlines
  631.     FooterBand = OrderSummary
  632.     Master = QRDetailLink1
  633.     PrintBefore = False
  634.     Left = 20
  635.     Top = 380
  636.   end
  637. end
  638.